home *** CD-ROM | disk | FTP | other *** search
/ Graphics Plus / Graphics Plus.iso / msdos / raytrace / pov / gen / form04a / shapes / unicorn.frm < prev    next >
Text File  |  1993-10-19  |  966b  |  28 lines
  1. horn = ellipse 2, 0.5 stack 40 in 25 bend 20 twist 20 grow 0.15;
  2. //horn looks like a unicorn horn
  3. horn move < 12, 15, 0>;
  4. //sphere 0.2 stack 20 in 15 bend 30 move <18, -2, 0>;
  5. mane3 = sphere 0.2 stack 90 in 50 bend -30 twist 360, 1;
  6. mane4 = sphere 0.2 stack 90 in 50 bend -30 twist 360, 2;
  7. mane1 = sphere 0.2 stack 90 in 50 bend -30 twist 360, 3;
  8. mane2 = sphere 0.2 stack 90 in 50 bend -30 twist 360, 4;
  9. mane5 = sphere 0.2 stack 90 in 50 bend -30 twist 360;
  10. // all 4 manes together look like a seashell or a cage
  11. mane2 move <-1, -4, 0>;
  12. mane1 move <-1, -4, 0>;
  13. mane3 move <-1, -4, 0>;
  14. mane4 move <-1, -4, 0>;
  15. mane5 move <-1, -4, 0>;
  16. mane2 move <-3, -7, 0>;
  17. mane1 move <-3, -7, 0>;
  18. mane3 move <-3, -7, 0>;
  19. mane4 move <-3, -7, 0>;
  20. mane5 move <-3, -7, 0>;
  21. mane2 move <-6, -10, 0>;
  22. mane1 move <-6, -10, 0>;
  23. mane3 move <-6, -10, 0>;
  24. mane4 move <-6, -10, 0>;
  25. mane5 move <-6, -10, 0>;
  26. //sphere 0.2 stack 20 in 10 bend 180 move <20, -18, 0>;
  27. end;
  28.